home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / batchut / bat.zip / MENU.BAT < prev    next >
DOS Batch File  |  1984-03-07  |  7KB  |  269 lines
  1. BAT * Jim's Menu
  2. BAT STACK.PURGE
  3. BAT * Labels %9 as the default drive
  4. BAT %9 = %v
  5. BAT -top
  6. BAT CLS |BEGTYPE
  7.  
  8.        \78╔═════════════════════════════════════════════════════════╗\07
  9.        \78║   The Menu System for Jim Grettum's Regular Programs.   ║\07
  10.        \78╚═══════════════════════════╦═════════════════════════════╝\07
  11. ╔══════════════════════════════════════╩══════════════════════════════════════╗
  12. ║                                          ║
  13. ║           PROGRAMS                  UTILITIES          ║
  14. ║      ----------------------------         -------------------------    ║
  15. ║  1.  Word Proof Spell Checker.        11.  OPEN                  ║
  16. ║  2.  FRee EDitor.                12.  OPEN                  ║
  17. ║  3.  1-2-3 (Lotus) Spread Sheet.        13.  OPEN                  ║
  18. ║  4.  MultiMate Word Processing.        14.  OPEN                  ║
  19. ║  5.  PC-Talk Communications.            15.  Copy Files.              ║
  20. ║  6.  Peachtree General Ledger.        16.  Erase Files.              ║
  21. ║  7.  Peachtree Connection.            17.  Clear Print Spooler.          ║
  22. ║  8.  OPEN                    18.  Clock on-off (toggle).       ║
  23. ║  9.  OPEN                    19.  Directories.              ║
  24. ║ 10.  OPEN                    20.  Run an alternate program.    ║
  25. ║                                          ║
  26. ║                                          ║
  27. ║  U.  Additional Utility Menu.          X.  Exit to system.          ║
  28. ╚═════════════════════════════════════════════════════════════════════════════╝
  29.  
  30. end
  31.  
  32. BAT READ Enter the number of your selection. > %A
  33. BAT IF %a = X GOTO -EXIT
  34. BAT IF %a = U GOTO -UTILITY
  35. BAT IF %a > 0 IF %a < 21 GOTO -opt%a
  36. BAT BEEP |GOTO -top
  37.  
  38. BAT -opt1
  39. WORDPRF
  40. MENU
  41.  
  42. BAT -opt2
  43. FRED
  44. MENU
  45.  
  46. BAT -opt3
  47. TI1
  48. 123
  49. TI1
  50. MENU
  51.  
  52. BAT -opt4
  53. BAT -stateMULTMATE
  54. BAT STATEOF a:HELPMSGS.SAV
  55. BAT IF %R = 0 GOTO -contMULTMATE
  56. BAT CLS |BEEP |BEGTYPE
  57. MULTIMATE's HELPMSGS.SAV is not in Drive A:
  58. Insert \78HELPMSGS.SAV\07 in Drive A:
  59. Enter (\78C\07) for Continue or (\78A\07) for Abort
  60. end
  61. BAT -restartMULTMATE
  62. BAT INKEY %a
  63. BAT IF %a = c goto -stateMULTMATE
  64. BAT IF %a <> a type C (Continue) or A (Abort) |BEEP goto -restartMULTMATE
  65. BAT GOTO -top
  66. BAT -contMULTMATE
  67. ti1
  68. a:
  69. %9:MULTMATE
  70. %9:
  71. ti1
  72. MENU
  73.  
  74. BAT -opt5
  75. BAT -statePCTALK
  76. BAT STATEOF a:pc-talk.exe
  77. BAT IF %r = 0 goto -contPCTALK
  78. BAT CLS |BEEP |BEGTYPE
  79. PC-TALK is not in Drive A:
  80. Insert \78PC-TALK\07 in Drive A:
  81. Enter (\78C\07) for Continue or (\78A\07) for Abort
  82. end
  83. BAT -restartPCTALK
  84. BAT INKEY %a
  85. BAT IF %a = c GOTO -statePCTALK
  86. BAT IF %a <> a TYPE C (Continue) or A (Abort) |BEEP goto -restartPCTALK
  87. BAT GOTO -top
  88. BAT -contPCTALK
  89. BAT CLS
  90. A:
  91. PC-TALK
  92. %9:
  93. MENU
  94.  
  95. BAT -opt6
  96. BAT CLS |BEGTYPE
  97.  
  98. Insert \78GENERAL LEDGER PROGRAM\07 into Drive A:
  99.  
  100. Insert \78GENERAL LEDGER DATA DISK\07 into Drive B:
  101.  
  102. Press any key to continue...
  103. end
  104. BAT INKEY
  105. BAT -stateGENLEDG
  106. BAT STATEOF a:GLMENU.DAT
  107. BAT IF %r = 0 goto -contGENLEDG
  108. BAT CLS |BEEP |BEGTYPE
  109. GENERAL LEDGER PROGRAM is not in Drive A:
  110. Insert \78GENERAL LEDGER PROGRAM Disk\07 in Drive A:
  111. Enter (\78C\07) for Continue or (\78A\07) for Abort
  112. end
  113. BAT -restartGENLEDG
  114. BAT inkey %a
  115. BAT IF %a = c goto -stateGENLEDG
  116. BAT IF %a <> a type C (Continue) or A (Abort) |BEEP GOTO -restartGENLEDG
  117. BAT GOTO -top
  118. BAT -contGENLEDG
  119. TI1
  120. A:
  121. ASTCLOCK
  122. BASIC START /C:0/F:5/S:255
  123. ASTCLOCK
  124. %9:
  125. TI1
  126. MENU
  127.  
  128. BAT -opt7
  129. bat cls
  130. BAT BEGTYPE
  131. Insert the Peachtree Connection Program Disk in Drive A:
  132.  
  133. Press any key to continue...
  134. end
  135. bat inkey
  136. BAT -stateCONNECT
  137. BAT STATEOF a:connect.exe
  138. BAT IF %r = 0 goto -contCONNECT
  139. BAT CLS |BEEP |BEGTYPE
  140. Connection is not in Drive A:
  141. Insert \78CONNECTION\07 in Drive A:
  142. Enter (\78C\07) for Continue or (\78A\07) for Abort
  143. end
  144. BAT -restartCONNECT
  145. BAT INKEY %a
  146. BAT IF %a = c GOTO -stateCONNECT
  147. BAT IF %a <> a TYPE C (Continue) or A (Abort) |BEEP goto -restartCONNECT
  148. BAT GOTO -top
  149. BAT -contCONNECT
  150. BAT CLS
  151. A:
  152. CONNECT
  153. %9:
  154. MENU
  155.  
  156.  
  157. BAT -opt8
  158. MENU
  159.  
  160. BAT -opt9
  161. MENU
  162.  
  163. BAT -opt10
  164. MENU
  165.  
  166. BAT -opt11
  167. MENU
  168.  
  169. BAT -opt12
  170. MENU
  171.  
  172. BAT -opt13
  173. MENU
  174.  
  175. BAT -opt14
  176. MENU
  177.  
  178.  
  179. BAT -opt15 * COPYING FILES
  180. BAT CLS
  181. BAT INKEY What is Drive you would like to copy from A, B, C, D > %1 |TYPE %1
  182. BAT IF %1 <> A IF %1 <> B IF %1 <> C IF %1 <> d |BEEP goto -opt15
  183. BAT READ FILE.SPEC for file you would like to COPY. %2
  184. BAT -copyto
  185. BAT INKEY What is Drive you would like to copy to A, B, C, D? > %3 |TYPE %3
  186. BAT IF %3 <> A IF %3 <> B IF %3 <> C IF %3 <> d |BEEP goto -copyto
  187. BAT READ FILE.SPEC for new file. %4
  188. BAT TYPE You are about to COPY %1:%2 to %3:%4
  189. BAT INKEY (A) to abort or any any other key to continue. %a
  190. BAT IF %A = A TYPE aborted |skip 2
  191. COPY %1:%2 %3:%4
  192. BAT
  193. BAT INKEY Do you want to copy more files? (Y) or (N) > %C |IF %C = y |BEEP goto -opt15
  194. MENU
  195.  
  196. BAT -opt16 * ERASE FILES
  197. BAT CLS
  198. BAT -ERASE
  199. BAT INKEY What drive for files to erase A, B, C, D? > %1 |TYPE %1
  200. BAT IF %1 <> A IF %1 <> B IF %1 <> C IF %1 <> d |BEEP goto -ERASE
  201. BAT READ FILE.SPEC for the file you would like to DELETE. %2
  202. DELETE %1:%2
  203. BAT
  204. BAT INKEY Do you want to erase more files? (Y) or (N) > %d |IF %d = y goto -opt16
  205. MENU
  206.  
  207. BAT -opt17
  208. BAT CLS
  209. BAT TYPE You are about to clear the print spooler.
  210. BAT INKEY (A) to abort any other key to CONTINUE. %a
  211. BAT IF %A = A TYPE aborted |goto -top
  212. a:superspl /p
  213. MENU
  214. BAT -opt17
  215. MENU
  216.  
  217. BAT -opt18
  218. TI1
  219. MENU
  220.  
  221.  
  222. BAT -opt19
  223. BAT CLS
  224. BAT -DIR
  225. BAT INKEY What is Drive for the Directory? A, B, C, D, > %1 |TYPE %1
  226. BAT IF %1 <> a IF %1 <> b IF %1 <> c IF %1 <> d |BEEP goto -DIR
  227. BAT READ FILE.SPEC for files you would like to see or [ENTER] for all.>%2
  228. BAT IF .%2 = . %2 = *.*/P
  229. BAT -dirques INKEY Would you like (S)tandard or (W)ide directory? > %3|TYPE %3
  230. BAT IF %3 <> s IF %3 <> w GOTO -dirques
  231. BAT %4 =|IF %3 = w %4 = /w
  232. DIR %1:%2 %4
  233. PAUSE
  234. MENU
  235.  
  236. BAT -opt20
  237. BAT CLS
  238. BAT -NEWPROGRAM
  239. BAT INKEY What is the new default Drive? A, B, C, D > %1 |TYPE %1
  240. BAT IF %1 <> a IF %1 <> b IF %1 <> c IF %1 <> d |BEEP goto -NEWPROGRAM
  241. BAT TYPE What program would you like to run?
  242. BAT READ Sample "BASICA B:FIREFIRE" or "PAC-GIRL". > %2 %3
  243. BAT TYPE The new default drive is %1: and the program is "%2 %3"?
  244. BAT INKEY Y or N > %A |IF %A = y skip 1
  245. BAT SKIP 4
  246. BAT CLS
  247. %1:
  248. %2 %3
  249. %9:
  250. BAT
  251. BAT INKEY Do you want to run another program? Y or N> %a
  252. BAT IF %A <> Y SKIP 1
  253. BAT GOTO -opt20
  254. MENU
  255.  
  256.  
  257. BAT -UTILITY
  258. UTILITY
  259. MENU
  260.  
  261.  
  262. BAT -EXIT
  263. BAT BEEP |TYPE you are about to exit the menu system.
  264. BAT INKEY (A) to stay in the menu system any other key to exit. > %A
  265. BAT IF %a = a TYPE aborted |GOTO -top
  266. BAT CLS
  267. A:
  268. %9:BAT EXIT
  269.